home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Merciful 1
/
Merciful - Disc 1.iso
/
_old_em
/
2
/
part2
/
91
(
.txt
)
< prev
next >
Wrap
AmigaBASIC Source Code
|
1988-08-15
|
2KB
|
9 lines
46914<0x18f5696>0?&-TSZAHw~elkFIXINKEY$ABSEOFSPACE$WENDLSETLOGON<0x51><0x58><0x47><0x4e>IMP<0x7c><0xe5,0x00>><0x18f56b7>5.01618e-316^ELKry`oGOSUBLENCDBLCALLCVDRIGHT$WRITE<0x20>NEXT<0x52><0x5b><0x5c><0x45><0x4e>\<0xe5,0x00>=232.69307e-35"+,U^GHqzcdm²»¼¥®×ØÁÊóôýæí
<0x18f5703>15397*SXAFJqz`iFIXINTLEFT$CHR$ELSESQRSTR$2ON<0x53><0x54><0x5d><0x46><0x4f>^<0xe5,0x00>>*64455438!&/V_@Ir{|enGOTOIFASCCVDRSETSGNWENDMKD$PUT<0x50><0x59>CVL<0x4d><0x4a>XOR<0xe5,0x00>*6774<0x18f574d>1? +R[+ENwxajFNFORLENCINTEOFRETURNSTRING$<0x20>NEXTPRINT<0x55><0x5e><0x47><0x48>AND<0xe5,0x00>USING/38.44539e-40<% AJst}fmEXPINKEY$ATNDATACVSSINWHILEMKS$<0x51><0x5c>MKL$<0x46><0x4a>AND<0x7f><0x60><1<0x18f57bc>129478!*ST]FOp{`klFNLETCLOSECOMMONSQRTANLOGLSETPUT<0x56><0x5d>ELSEIF<0x49>OR<0x55,0x00>TO'0118240564=&-PYBKLu~ghFIELDLEFT$CALLCINT <0x20>OPEN<0x52><0x5b><0x5c><0x45><0x48>AND<0x7e>NOT+41<0x18f582f><0x18f5830>50;"+,S^GHw|cdm²»º£¨×ØÁÊõôýæí
38'(Q\CFJqbk·¸¡¬ÕÔÛÆÏòùâëì1<%$-V]@Ir{zen³²»¦ÐÒÂÍÊGNçè
1?")R[\CNwxajFNFORINTCINTEOFRNDSTRING$LOFOPENON<0x53><0x5e><0x47><0x4c>AND<0xaf,0x00>USING-58.44539e-40:%.NOTXAJst{ INKEY$CDBLDATACVSSINWHILEREAD<0x57><0x5a>MKL$<0x46><0x4a>AND<0x7f><0x62>>1LEN78278!*ST[FO<0x59>ydmjGETLET5COMMONRIGHT$TANMID$LOFPUT<0x56><0x5d>ELSEIF<0x49>OR<0x7d><0x6b,0x00>*67var0a334;&-PYDKLsxanFIELDINPUTCALLCINTCVDRIGHT$WRITE<0x18f5951>NEXT<0x52><0x5b><0x5c>MKL$<0x4e>q<0x6b,0x00>=23<0x18f595e><0x18f595f>509$+,U^\Hqz GOSUB6ABSCOSRNDWENDVALMID$READ<0x57><0x58>CLNG<0x4a>IMPEQV<0x60,0x00>F<0x18f59b4>8<0x18f59b6><0x18f59b7>&H333e'(QZCFJq<0x18f59c3>biFIXINTLEFT$CALLELSESQRSTR$LOCON<0x53><0x54><0x5b><0x46><0x4f>OR<0x60,0x00><+FN117977402%"-V]@Ir}|eÞµ´»¦ÐÙÄËÌóþáî ")Ré\CNwxÑj²¹¤«¬ÕÞÇÈñúåäí
<0x18f5a53>2=<%.WXAJut} LINECDBLCVICVSRSETSTR$LOCMKS$<0x57><0x5a>MKL$<0x46><0x4a>AND<0x7f><0x62>>1<0x18f5aa4>77678!*ST[FMrydmlGETLETCLOSECOMMONRIGHT$TANMID$LSETPUT<0x56><0x5d>ELSEIF<0x49>OR<0x7d><0x7c>TO*67var0a354EOF&-P_BKLu~ghGOTOINPUTCALLCINTCVDRIGHT$WRITELOFNEXT<0x52><0x5b><0x5c><0x45><0x48>AND<0x6b,0x00>=232.65546e-35"-*S^GHw| GOSUBLENABSCOSRNDWENDVALMID$READQ<0x58>CLNG<0x4c>IMPEQV<0x7d>THEN-<0x18f5b44>3.35139e-316ZC-Jq<0x18f5b53>biFIXPRINTLEFT$CHR$ELSESQRWHILEPRINT<0x55><0x54><0x5d><0x46><0x4d>^<0x62,0x00><+27var0e37:#$-V]@Ir}|enGOTOIFASCCVSRSETSGNWENDMKD$PUT<0x50><0x59>AREA<0x4b>JIMP<0x7e>NOT*69<0x18f5b91>1 R[\ENwxajFNFORLENCINTDATARETURNSTRING$LOFOPENPRINT<0x55><0x5e><0x47><0x48>AND<0x20,0x00><0x61>-50 :#(Q^GLst}dmEXPINKEY$CDBLCVICVSSINWHILEREAD<0x51><0x5a>MKL$<0x46><0x4a>AND<0x7f><0x60><1<0x18f5c31>1294CHR$8!*ST]FMpyb LETCLOSECOMMONvarffffbaa3LSETPUT<0x56><0x5d>CVL<0x4b>OR<0xdc,0x00>TO*67var0a334=$-PYDMJsxahFIELDINPUTCALLCINTCVDRIGHT$WRITE<0x20>OPEN<0x50><0x5b><0x5c><0x45><0x4e>\<0xdc,0x00>=231.65966e-36"+,U^GHqzcdm°¹¼¥®×ØÁÊóôÿäí5>'(SXCFJqbk ·¸¡ªÓÔßÄÏðùâëì1:#$-V_@Iry~gl1±¶¿¦¯ÐkÂËÌõþçê
1?")R[^GLuz<0x48>hFIELDGOSUBLINECINTEOFRETURNSTRING$LOFNEXTREAD<0x57>W<0x45><0x4a>XOR<0xdc,0x00>USING-52.97765e-318ZCHst}foEXP ELSE<VALMID$ON<0x51><0x5a>MKL$<0x46><0x4a>AND<0x7f><0x62>>1<0x18f5d91>129478!*ST]FOp{`ilGETLETCLOSECOMMONRIGHT$TANLOCMKD$REMÔßÀyòûüåî
34?$-R[BKLu~gh±¿¢©ÒÛÜÅÌõúáê2;"+,U^GHqzcdm²»¼¥®×ØÁÊñöÿTï